proc add {n m} {
    return [expr $n + $m]
}